home *** CD-ROM | disk | FTP | other *** search
/ Windows Game Programming for Dummies (2nd Edition) / WinGamProgFD.iso / pc / DirectX SDK / DXSDK / samples / Multimedia / VBSamples / Misc / DXSetup / copy.frm (.txt) < prev    next >
Encoding:
Visual Basic Form  |  2001-10-08  |  3.9 KB  |  124 lines
  1. VERSION 5.00
  2. Begin VB.Form frmCopy 
  3.    BorderStyle     =   3  'Fixed Dialog
  4.    Caption         =   "#"
  5.    ClientHeight    =   1830
  6.    ClientLeft      =   870
  7.    ClientTop       =   1530
  8.    ClientWidth     =   5910
  9.    ClipControls    =   0   'False
  10.    BeginProperty Font 
  11.       Name            =   "MS Sans Serif"
  12.       Size            =   8.25
  13.       Charset         =   0
  14.       Weight          =   700
  15.       Underline       =   0   'False
  16.       Italic          =   0   'False
  17.       Strikethrough   =   0   'False
  18.    EndProperty
  19.    HasDC           =   0   'False
  20.    Icon            =   "copy.frx":0000
  21.    LockControls    =   -1  'True
  22.    MaxButton       =   0   'False
  23.    MinButton       =   0   'False
  24.    NegotiateMenus  =   0   'False
  25.    ScaleHeight     =   1830
  26.    ScaleWidth      =   5910
  27.    ShowInTaskbar   =   0   'False
  28.    Begin VB.PictureBox picStatus 
  29.       AutoRedraw      =   -1  'True
  30.       ClipControls    =   0   'False
  31.       FillColor       =   &H00FF0000&
  32.       BeginProperty Font 
  33.          Name            =   "MS Sans Serif"
  34.          Size            =   8.25
  35.          Charset         =   0
  36.          Weight          =   400
  37.          Underline       =   0   'False
  38.          Italic          =   0   'False
  39.          Strikethrough   =   0   'False
  40.       EndProperty
  41.       Height          =   384
  42.       Left            =   168
  43.       ScaleHeight     =   330
  44.       ScaleWidth      =   5535
  45.       TabIndex        =   3
  46.       TabStop         =   0   'False
  47.       Top             =   708
  48.       Width           =   5592
  49.    End
  50.    Begin VB.CommandButton cmdExit 
  51.       Cancel          =   -1  'True
  52.       Caption         =   "#"
  53.       Default         =   -1  'True
  54.       BeginProperty Font 
  55.          Name            =   "MS Sans Serif"
  56.          Size            =   8.25
  57.          Charset         =   0
  58.          Weight          =   400
  59.          Underline       =   0   'False
  60.          Italic          =   0   'False
  61.          Strikethrough   =   0   'False
  62.       EndProperty
  63.       Height          =   420
  64.       Left            =   2085
  65.       MaskColor       =   &H00000000&
  66.       TabIndex        =   0
  67.       Top             =   1275
  68.       Width           =   1665
  69.    End
  70.    Begin VB.Label lblDestFile 
  71.       Caption         =   "*"
  72.       BeginProperty Font 
  73.          Name            =   "MS Sans Serif"
  74.          Size            =   8.25
  75.          Charset         =   0
  76.          Weight          =   400
  77.          Underline       =   0   'False
  78.          Italic          =   0   'False
  79.          Strikethrough   =   0   'False
  80.       EndProperty
  81.       Height          =   192
  82.       Left            =   168
  83.       TabIndex        =   1
  84.       Top             =   300
  85.       Width           =   5640
  86.    End
  87.    Begin VB.Label lblCopy 
  88.       AutoSize        =   -1  'True
  89.       Caption         =   "#"
  90.       BeginProperty Font 
  91.          Name            =   "MS Sans Serif"
  92.          Size            =   8.25
  93.          Charset         =   0
  94.          Weight          =   400
  95.          Underline       =   0   'False
  96.          Italic          =   0   'False
  97.          Strikethrough   =   0   'False
  98.       EndProperty
  99.       Height          =   195
  100.       Left            =   165
  101.       TabIndex        =   2
  102.       Top             =   0
  103.       Width           =   105
  104.    End
  105. Attribute VB_Name = "frmCopy"
  106. Attribute VB_GlobalNameSpace = False
  107. Attribute VB_Creatable = False
  108. Attribute VB_PredeclaredId = True
  109. Attribute VB_Exposed = False
  110. Option Explicit
  111. Private Sub cmdExit_Click()
  112.     ExitSetup Me, gintRET_EXIT
  113. End Sub
  114. Private Sub Form_Load()
  115.     SetFormFont Me
  116.     cmdExit.Caption = ResolveResString(resBTNCANCEL)
  117.     lblCopy.Caption = ResolveResString(resLBLDESTFILE)
  118.     lblDestFile.Caption = vbNullString
  119.     frmCopy.Caption = gstrTitle
  120. End Sub
  121. Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
  122.     HandleFormQueryUnload UnloadMode, Cancel, Me
  123. End Sub
  124.